home *** CD-ROM | disk | FTP | other *** search
/ The X-Philes (2nd Revision) / The X-Philes Number 1 (1995).iso / xphiles / hp48_2 / alpha_tb < prev    next >
Internet Message Format  |  1995-03-31  |  2KB
  1. From: Thomas Boerner <UET008@DDOHRZ11UET008%DDOHRZ11.BITNET@vm.gmd.de>
  2. Subject:  v05i018:  alpha_tb - alpha-mode with strings & binaries v1.0, Part01/01
  3. Newsgroups: comp.sources.hp48
  4. Followup-To: comp.sys.hp48
  5. Approved: spell@seq.uncwil.edu
  6.  
  7. Checksum: 3386369652 (verify with brik -cv)
  8. Submitted-by: Thomas Boerner <UET008@DDOHRZ11UET008%DDOHRZ11.BITNET@vm.gmd.de>
  9. Posting-number: Volume 5, Issue 18
  10. Archive-name: alpha_tb/part01
  11.  
  12.  
  13. BEGIN_DOC alpha.doc
  14. Anybody out there who finds it annoying always to hit the alpha key when
  15. entering binary integers, strings, units or tagged ?
  16. Here is the solution: 4 little programs which, assigned to the appropriate
  17. keys, will turn on alpha-locked-mode when entering [blueshift][div] ( # ),
  18. [blueshift][mult] ( _ (to build units)), [blueshift][sub] ( "" ), or
  19. [blueshift][add] ( :: ).
  20. These programs have to be assigned directly to the key to work properly.
  21.  
  22. So the file consists actually of a list containing 4 tagged lists which can
  23. be used as arguments for STOKEYS. Choose which ones you want to use.
  24.  
  25. 1.Download the file below.
  26. 2.ASC-> it.
  27. 3.OBJ-> it.
  28. 4.Now there should be 4 tagged lists on the stack. They can immediately be
  29.   used with STOKEYS. Drop the ones you don't want to install.
  30.  
  31.  
  32. Bug reports and anything else welcome.
  33. Thomas Boerner, Dortmund, Germany.  UET008@DDOHRZ11
  34. END_DOC
  35.  
  36. BEGIN_ASC alpha.asc
  37. %%HP: T(3)A(D)F(.);
  38. "47A20CFA20D032027796478602C8D2C4F636B647A20D9D20A580480CA352D04B
  39. 2130339201000000000003560B2130CFA20D0F5027796478602C8D2C4F636B64
  40. 7A20D9D20A58043B6A352D04B2130339201000000000003570B2130CFA20E022
  41. 22027796478602C8D2C4F636B647A20D9D20A580412CA352D04B213033920100
  42. 0000000003580B2130CFA20E0A3A3027796478602C8D2C4F636B647A20D9D20A
  43. 5804FEBA352D04B2130339201000000000003590B2130B2130EB29"
  44. END_ASC
  45.  
  46.  
  47. BYTES: #92BEh 191.5
  48.  
  49. BEGIN_UU alpha.uue
  50. begin 644 alpha
  51. M2%!(4#0X+45T*L"O`@TC('=I=&@@C"U,;V-K="K0V0):"(3`.B4-M!(#,RD0
  52. M```````P9;`2`_PJT/`%<I=&AP;"V,+T-K9&IP*=+:"%0+.F4])`*S$PDP(!
  53. M``````!3!RLQP*\"#B(B('=I=&@@C"U,;V-K="K0V0):"!3".B4-M!(#,RD0
  54. M```````PA;`2`_PJX*"C`W*71H<&PMC"]#:V1J<"G2V@A4#OJU/20"LQ,),"
  55. -`0``````4PDK,;`2`[`2
  56. `
  57. end
  58. sum -r/size 55309/292 section (from "begin" to "end")
  59. sum -r/size 3794/193 entire input file
  60. END_UU
  61.